home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ultimate Blitz Basic 2.1
/
Ultimate Blitz Basic 2.1 (1997)(Acid Software).iso
/
installblitz2
< prev
next >
Wrap
Text File
|
1997-10-09
|
3KB
|
172 lines
(
(run "copy blitz2/blitz2 to ram:")
(run "copy blitz2/blitz2.info to ram:")
(run "copy blitz2/ted to ram:")
(run "copy blitz2/ted.info to ram:")
(run "copy blitz2/acidlibs to ram:")
(run "copy blitz2/defaultdbug to ram:")
(run "copy blitz2/deflibs to ram:")
(run "copy blitz2/help to ram:")
(run "copy blitz2/help.dat to ram:")
)
; ask where to install Blitz2
(set UpdateS_text
(cat
"One moment please, updating S:User0Startup"
newline
newline
)
)
(set UpdateSPrompt_text
(cat
"A Blitz2: assignment needs to be added to the \"S:User-Startup\" "
"so that your system will be properly configured to use Blitz2."
)
)
(set UpdateSPrompt_texts
(cat
"A Blitzlibs: assignment needs to be added to the \"S:User-Startup\" "
"so that your system will be properly configured to use Blitz2."
)
)
(set #progname
(cat "Blitz2"
))
(set #prognames
(cat "Blitzlibs"
))
(set vc-dest
(askdir
(prompt "Please select the Directory where you would like to install"
" Blitz2. ")
(help @askdir-help)
(default @default-dest)
)
)
(set @default-dest vc-dest)
(set BB (tackon @default-dest #progname))
(makedir BB)
(
(working "Installing Blitz2 Program")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Ram:Blitz2")
(dest BB)
(infos)
)
)
(
(working "Installing Ted Program")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Ram:Ted")
(dest BB)
(infos)
)
)
(
(working "Installing acidlibs")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Ram:acidlibs")
(dest BB)
(infos)
)
)
(
(working "Installing defaultdbug")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Ram:Blitz2")
(dest BB)
(infos)
)
)
(
(working "Installing deflibs")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Ram:deflibs")
(dest BB)
(infos)
)
)
(
(working "Installing help")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Ram:help")
(dest BB)
(infos)
)
)
(
(working "Installing help.dat")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Ram:help.dat")
(dest BB)
(infos)
)
)
(startup "Blitz2"
(prompt UpdateSPrompt_text)
(help @startup-help)
(command "ASSIGN Blitz2: " quote BB quote newline)
)
(set @default-dest BB)
(set BB (tackon @default-dest #prognames))
(makedir BB)
(startup "Blitzlibs"
(prompt UpdateSPrompt_texts)
(help @startup-help)
(command "ASSIGN Blitzlibs: " quote BB quote newline)
)
(
(run "delete ram:Blitz2")
(run "delete ram:Blitz2.info")
(run "delete ram:Ted")
(run "delete ram:Ted.info")
(run "delete ram:acidlibs")
(run "delete ram:defaultdbug")
(run "delete ram:deflibs")
(run "delete ram:help")
(run "delete ram:help.dat")
)
(exit)